% Test the compWavelet.m program which computes the scaling and
% wavelet functions. Run 3 wavelet scenarios: Daubechies D4, D6 and D8.

% Setup the filter coefficients for D6 and D8. 
d6 = [0.3327    0.8069    0.4599   -0.1350   -0.0854    0.0352];
d8 = [0.2304    0.7148    0.6309   -0.0281   -0.1870    0.0308    0.0329   -0.0106];

input('Type Enter to run the D4 function test');
compWavelet();  % D4 is the default

input('Type Enter to run the D6 function test');
compWavelet(d6); 

input('Type Enter to run the D8 function test');
compWavelet(d8); 

